home *** CD-ROM | disk | FTP | other *** search
- object MainWin: TMainWin
- Left = 313
- Top = 115
- BorderStyle = bsSingle
- ClientHeight = 378
- ClientWidth = 632
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'Arial'
- Font.Style = []
- Menu = MainMenu1
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnPaint = FormPaint
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 19
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 413
- Height = 23
- Alignment = taCenter
- AutoSize = False
- Caption = 'Select Hot Key'
- Font.Color = clBlack
- Font.Height = -20
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Bevel1: TBevel
- Left = 436
- Top = 232
- Width = 181
- Height = 141
- Style = bsRaised
- end
- object Bevel2: TBevel
- Left = 436
- Top = 4
- Width = 181
- Height = 221
- Style = bsRaised
- end
- object KeyList: TListBox
- Left = 8
- Top = 36
- Width = 413
- Height = 337
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 17
- ParentFont = False
- Style = lbOwnerDrawFixed
- TabOrder = 0
- OnDblClick = KeyListDblClick
- OnDrawItem = KeyListDrawItem
- end
- object EnterKeyButton: TButton
- Left = 444
- Top = 240
- Width = 165
- Height = 61
- Caption = '&Enter Keystrokes'
- TabOrder = 1
- OnClick = EnterKeyButtonClick
- end
- object CaptureKeyButton: TButton
- Left = 444
- Top = 304
- Width = 165
- Height = 61
- Caption = '&Capture Keystrokes'
- TabOrder = 2
- OnClick = CaptureKeyButtonClick
- end
- object ClearHotKey: TButton
- Left = 444
- Top = 76
- Width = 165
- Height = 45
- Caption = '&Remove Hot Key'
- TabOrder = 3
- OnClick = ClearHotKeyClick
- end
- object CopyHotKey: TButton
- Left = 444
- Top = 124
- Width = 165
- Height = 45
- Caption = 'Cop&y Hot Key'
- TabOrder = 4
- OnClick = CopyHotKeyClick
- end
- object MoveHotKey: TButton
- Left = 444
- Top = 172
- Width = 165
- Height = 45
- Caption = '&Move Hot Key'
- TabOrder = 5
- OnClick = MoveHotKeyClick
- end
- object AddHotKey: TButton
- Left = 444
- Top = 12
- Width = 165
- Height = 61
- Caption = '&Add Hotkey'
- TabOrder = 6
- OnClick = AddHotKeyClick
- end
- object MainMenu1: TMainMenu
- Left = 364
- Top = 308
- object MenuFile: TMenuItem
- Caption = '&File'
- ShortCut = 0
- object MenuScreen: TMenuItem
- Caption = 'Screen Si&ze'
- ShortCut = 0
- object N640x480: TMenuItem
- Caption = '&640 x 480'
- ShortCut = 16496
- OnClick = N640x480Click
- end
- object N800x600: TMenuItem
- Caption = '&800 x 600'
- ShortCut = 16497
- OnClick = N800x600Click
- end
- object N1024x768: TMenuItem
- Caption = '&1024 x 768'
- ShortCut = 16498
- OnClick = N1024x768Click
- end
- object N1280x1024: TMenuItem
- Caption = '1&280 x 1024'
- ShortCut = 16499
- OnClick = N1280x1024Click
- end
- end
- object N2: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object MenuPrint: TMenuItem
- Caption = '&Print Hot Key List'
- ShortCut = 0
- OnClick = MenuPrintClick
- end
- object N3: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object MenuHide: TMenuItem
- Caption = '&Hide SmartCode'
- ShortCut = 0
- OnClick = MenuHideClick
- end
- object MenuTerminate: TMenuItem
- Caption = '&Terminate SmartCode'
- ShortCut = 0
- OnClick = MenuTerminateClick
- end
- end
- object MenuOptions: TMenuItem
- Caption = '&Options'
- ShortCut = 0
- object MenuAddHotKey: TMenuItem
- Caption = '&Add Hot Key'
- ShortCut = 0
- OnClick = MenuAddHotKeyClick
- end
- object MenuClearHot: TMenuItem
- Caption = '&Remove Hot Key'
- ShortCut = 0
- OnClick = MenuClearHotClick
- end
- object MenuCopyHot: TMenuItem
- Caption = 'Cop&y Hot Key'
- ShortCut = 0
- OnClick = MenuCopyHotClick
- end
- object MenuMoveHot: TMenuItem
- Caption = '&Move Hot Key'
- ShortCut = 0
- OnClick = MenuMoveHotClick
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object MenuEnterKey: TMenuItem
- Caption = '&Enter Keystrokes'
- ShortCut = 0
- OnClick = MenuEnterKeyClick
- end
- object MenuCaptureKey: TMenuItem
- Caption = '&Capture Keystrokes'
- ShortCut = 0
- OnClick = MenuCaptureKeyClick
- end
- end
- object MenuHelp: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- object MenuContents: TMenuItem
- Caption = '&Contents'
- ShortCut = 0
- OnClick = MenuContentsClick
- end
- object MenuAbout: TMenuItem
- Caption = '&About'
- ShortCut = 0
- OnClick = MenuAboutClick
- end
- object MenuOther: TMenuItem
- Caption = '&Other Products'
- ShortCut = 0
- OnClick = MenuOtherClick
- end
- object MenuOrder: TMenuItem
- Caption = 'O&rder'
- ShortCut = 0
- OnClick = MenuOrderClick
- end
- end
- end
- object MyPrintDialog: TPrintDialog
- Left = 304
- Top = 308
- end
- end
-